home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
426-450
/
disk_445
/
turbotext
/
support
/
ttx_m2.dfn
< prev
next >
Wrap
Text File
|
1992-05-06
|
2KB
|
141 lines
/** $VER: TTX_M2.dfn Demo 1.0 (29.11.90)
**
** This definition file contains definitions necessary to use TurboText as a
** Modula-2 programmer's editor.
**
** Written by Martin Taillefer
**/
DICTIONARY:
ABS
ADDRESS
ADR
AND
ARRAY
BEGIN
BITSET
BOOLEAN
BY
BYTE
CAP
CARDINAL
CASE
CHAR
CHR
CONST
DEC
DEFINITION
DIV
DO
ELSE
ELSIF
END
EXCL
EXIT
FALSE
FLOAT
FLOATD
FOR
FORWARD
FROM
HALT
HIGH
IF
IMPLEMENTATION
IMPORT
IN
INC
INCL
INTEGER
LONG
LONGCARD
LONGINT
LONGSET
LONGREAL
LONGWORD
LOOP
MAX
MIN
MOD
MODULE
NIL
NOT
ODD
OF
OR
ORD
POINTER
PROC
PROCEDURE
REAL
RECORD
REM
REPEAT
RETURN
SET
SHORT
SHORTCARD
SHORTINT
SHORTSET
SIZE
SYSTEM
THEN
TO
TRUE
TRUNC
TRUNCD
TSIZE
TYPE
UNTIL
VAL
VAR
WHILE
WITH
WORD
#
TEMPLATES:
"ADDRESS"
"ARRAY [@] OF"
"BEGIN*n"
"BITSET;*n"
"BOOLEAN;*n"
"CARDINAL;*n"
"CASE @ OF*n*nEND;*n"
"CHAR;*n"
"CONST*n"
"DEFINITION MODULE @;*n"
"END;*n"
"FALSE;*n"
"FOR @:= TO DO*n*nEND;*n"
"FROM @ IMPORT ;*n"
"IF (@) THEN*n*nEND;*n"
"INTEGER;*n"
"IMPORT @;*n"
"IMPLEMENTATION MODULE @;*n"
"LONGSET;*n"
"LONGCARD;*n"
"LONGINT;*n"
"LONGREAL;*n"
"LOOP*n@*nEND;*n"
"MODULE @;*n"
"PROCEDURE @();*nVAR*n*nBEGIN*n*nEND ;*n"
"POINTER TO"
"REPEAT*n@*nUNTIL ();*n"
"RECORD*n@*nEND;"
"RETURN"
"SHORTCARD;*n"
"SHORINT;*n"
"SHORTSET;*n"
"THEN*n"
"TYPE*n"
"UNTIL (@);*n"
"WHILE (@) DO*n*nEND;*n"
"WITH @ DO*n*nEND;*n"
#